home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
daten
/
db
/
examples
/
arexxdemos
/
calc.db
next >
Wrap
Text File
|
1995-08-31
|
187b
|
8 lines
/* calc expression in given gadget
Written by: Richard Ludwig */
options results;GETFIELD
if verify(result, '0123456789+-*/().','m') then do
interpret 'ret=' result
PUTFIELD ret
end